home *** CD-ROM | disk | FTP | other *** search
/ Windows Expert / Windows Expert.iso / windownt / uupc11ys.zip / LIB / BUGOUT.C < prev    next >
C/C++ Source or Header  |  1992-11-27  |  2KB  |  37 lines
  1. /*--------------------------------------------------------------------*/
  2. /*    b u g o u t . c                                                 */
  3. /*                                                                    */
  4. /*    Support routines for UUPC/extended                              */
  5. /*                                                                    */
  6. /*    Changes Copyright 1990, 1991 (c) Andrew H. Derbyshire           */
  7. /*                                                                    */
  8. /*    History:                                                        */
  9. /*       21Nov1991 Break out of lib.c                          ahd    */
  10. /*--------------------------------------------------------------------*/
  11.  
  12. #include <stdio.h>
  13. #include <stdlib.h>
  14. #include <string.h>
  15. #include <time.h>
  16.  
  17. /*--------------------------------------------------------------------*/
  18. /*                    UUPC/extended include files                     */
  19. /*--------------------------------------------------------------------*/
  20.  
  21. #include "lib.h"
  22. #include "catcher.h"
  23.  
  24. /*--------------------------------------------------------------------*/
  25. /*    b u g o u t                                                     */
  26. /*                                                                    */
  27. /*    Perform a panic() exit from UUPC/extended                       */
  28. /*--------------------------------------------------------------------*/
  29.  
  30. void bugout( const size_t lineno, const char *fname )
  31. {
  32.    printmsg(0,"Program aborting at line %d in file %s",
  33.               lineno, fname );
  34.    fputc('\a',stderr);
  35.    exit(panic_rc);
  36. } /*bugout */
  37.